home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / MacGofer 0.22d / MacGofer Sources / mac_MPW.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-01-06  |  4.1 KB  |  192 lines  |  [TEXT/KAHL]
  1. /*****************************************************************************
  2.  
  3.   MPW.c:  Copyright (c) Kevin Hammond 1993.   All rights reserved.
  4.   
  5.   MPW emulation for Think C.
  6.   
  7. *****************************************************************************/
  8.  
  9. #include "mac.h"
  10.  
  11. #pragma segment MPW
  12.  
  13. void setitem(MenuHandle menu,short item,char *file)
  14. {
  15.    char temp[256];
  16.    strcpy(temp,file);
  17.    SetItem(menu,item,c2pstr(temp));
  18. }
  19.  
  20. OSErr getvol(char *volName,short *vRefNum)
  21. {
  22.    char temp[256];
  23.    strcpy(temp,volName);
  24.    return(GetVol(c2pstr(temp),vRefNum));
  25. }
  26.  
  27. OSErr fsdelete(char *file,short vrefnum)
  28. {
  29.    char temp[256];
  30.    strcpy(temp,file);
  31.    return(FSDelete(c2pstr(temp),vrefnum));
  32. }
  33.  
  34.  
  35. OSErr create(char *fileName,short vRefNum,OSType creator,OSType fileType) 
  36. {
  37.    char temp[256];
  38.    strcpy(temp,fileName);
  39.    return(Create(c2pstr(temp),vRefNum,creator,fileType));
  40. }
  41.  
  42. int access(file,mode)
  43. char *file;
  44. int mode;
  45. {
  46.   short path;
  47.   return(fsopen(file,0,&path) != noErr);
  48. }
  49.  
  50. Boolean equalstring(char *str1,char *str2,Boolean caseSens,Boolean diacSens)
  51. {
  52.    char temp1[256];
  53.    char temp2[256];
  54.    strcpy(temp1,str1);
  55.    strcpy(temp2,str2);
  56.    return(EqualString(c2pstr(temp1),c2pstr(temp2),caseSens,diacSens));
  57. }
  58.  
  59.  
  60. void debugstr(char *s)
  61. {
  62.    char temp[256];
  63.    strcpy(temp,s);
  64.    DebugStr(c2pstr(temp));
  65. }
  66.  
  67. OSErr fsopen(char *fileName,short vRefNum,short *refNum) 
  68. {
  69.   char temp[256];
  70.   strcpy(temp,fileName);
  71.   return(FSOpen(c2pstr(temp),vRefNum,refNum));
  72. }
  73.  
  74. void getfnum(char *theName,short *familyID)
  75. {
  76.   char temp[256];
  77.   strcpy(temp,theName);
  78.   GetFNum(c2pstr(temp),familyID);  
  79. }
  80.  
  81. void getfontname(short familyID,char *theName)
  82. {
  83.   Str255 temp;
  84.   GetFontName(familyID,temp);
  85.   strcpy(theName,p2cstr(temp));
  86. } 
  87.  
  88. void getitext(Handle item,char *text) 
  89. {
  90.   Str255 temp;
  91.   GetIText(item,temp);
  92.   strcpy(text,p2cstr(temp));
  93. }
  94.  
  95. void setitext(Handle item,char *text)
  96. {
  97.   char temp[256];
  98.   strcpy(temp,text);
  99.   SetIText(item,c2pstr(temp));  
  100. }
  101.  
  102. void getitem(MenuHandle menu,short item,char *itemString)
  103. {
  104.   Str255 temp;
  105.   GetItem(menu,item,temp);
  106.   strcpy(itemString,p2cstr(temp));
  107. } 
  108.  
  109. void insmenuitem(MenuHandle theMenu,char *itemString,short afterItem)
  110. {
  111.   char temp[256];
  112.   strcpy(temp,itemString);
  113.   InsMenuItem(theMenu,c2pstr(temp),afterItem);
  114. }
  115.  
  116. void getwtitle(WindowPtr theWindow,char *title)
  117. {
  118.    Str255 temp;
  119.    GetWTitle(theWindow,temp);
  120.    strcpy(title,p2cstr(temp));
  121. }
  122.  
  123. void setwtitle(WindowPtr theWindow,char *title)
  124. {
  125.   char temp[256];
  126.   strcpy(temp,title);
  127.   SetWTitle(theWindow,c2pstr(temp));
  128. }
  129.  
  130. void setctitle(ControlHandle theControl,char *title) 
  131. {
  132.   char temp[256];
  133.   strcpy(temp,title);
  134.   SetCTitle(theControl,c2pstr(temp));
  135. }
  136.  
  137. void paramtext(char *s1,char *s2,char *s3,char *s4)
  138. {
  139.    char temp1[256];
  140.    char temp2[256];
  141.    char temp3[256];
  142.    char temp4[256];
  143.    strcpy(temp1,s1);
  144.    strcpy(temp2,s2);
  145.    strcpy(temp3,s3);
  146.    strcpy(temp4,s4);
  147.    ParamText(c2pstr(temp1),c2pstr(temp2),c2pstr(temp3),c2pstr(temp4));
  148. }
  149.  
  150. void sfpputfile(Point *where,char *prompt,char *origName,DlgHookProcPtr dlgHook,
  151.     SFReply *reply,short dlgID,ModalFilterProcPtr filterProc)
  152. {
  153.   char temp1[256], temp2[26];
  154.   strcpy(temp1,prompt);
  155.   strcpy(temp2,origName);
  156.   SFPPutFile(*where,c2pstr(temp1),c2pstr(temp2),dlgHook,reply,dlgID,filterProc);
  157. }
  158.  
  159. void sfgetfile(Point *where,char *prompt,FileFilterProcPtr fileFilter,short numTypes,
  160.     SFTypeList typeList,DlgHookProcPtr dlgHook,SFReply *reply)
  161. {
  162.   char temp[256];
  163.   strcpy(temp,prompt);
  164.   SFGetFile(*where,c2pstr(temp),fileFilter,numTypes,typeList,
  165.             dlgHook,reply);
  166. }
  167.  
  168. void sfpgetfile(Point *where,char *prompt,FileFilterProcPtr fileFilter,
  169.     short numTypes,SFTypeList typeList,DlgHookProcPtr dlgHook,SFReply *reply,
  170.     short dlgID,ModalFilterProcPtr filterProc)
  171. {
  172.   char temp[256];
  173.   strcpy(temp,prompt);
  174.   SFPGetFile(*where,c2pstr(temp),fileFilter,numTypes,typeList,
  175.             dlgHook,reply,dlgID,filterProc);
  176. }
  177.  
  178. void sfputfile(Point *where,char *prompt,char *origName,DlgHookProcPtr dlgHook,
  179.     SFReply *reply)
  180. {
  181.   char temp1[256], temp2[26];
  182.   strcpy(temp1,prompt);
  183.   strcpy(temp2,origName);
  184.   SFPutFile(*where,c2pstr(temp1),c2pstr(temp2),dlgHook,reply);
  185. } 
  186.  
  187. stringMatch (s1,s2)
  188. char *s1, *s2;
  189. {
  190.   return(strcmp(s1,s2)==0);
  191. }
  192.